Public Class MiscForm

  Private Sub ConvertCountryButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ConvertCountryButton.Click

    Me.ConvertCountryTextBox.Text = dotNetTips.Utility.Data.CountryCollection.ConvertNameOrCode(Me.ConvertCountryTextBox.Text)

  End Sub

  Private Sub ConvertStateButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ConvertStateButton.Click
    Me.ConvertStateTextBox.Text = dotNetTips.Utility.Data.UsStateCollection.ConvertNameOrCode(Me.ConvertStateTextBox.Text)
  End Sub
End Class